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1.0 ABSTRACT 
FORMATS. 6 BO FORMATTER Mag gg hy When FUSER TO eed 
ALL AOBRES i Be eon va DIT, PART @ ALLOWS THE 


REUR ER OF ANY ODES 
SECTOR. PART 3 FORMATS "ARO VERIFIES THE DISK WITH 
QUENCE oF SECTOR ADDRESSES SPECIFIED BY THE 


2.0 REQUIREMENTS 


2.1 EQUIPMENT 
PDP-11 CONFIGURATION 


STANDARD 
RP11C DISK CONTROLLER 
ONE OR MORE RPOS DISK DRIVES 


é.2 STORAGE 
PROGRAM REQUIRES 4K OF STORAGE 


2.3 PRELIMINARY PROGRAMS 


DZRPA DISKLESS DIAGNOSTIC 
OZRPB RP1IC RELIABILITY DIAGNOSTIC 


3.0 LOADING PROCEDURE 
USE STANDARD PROCEDURE FOR ABS TYPES. 


4.0 STARTING PROCEDURE 


4.1 CONTROL SWITCH SETTING 
SEE SECTION S.1.1 
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4.2 STARTING ADDRESS 
THE PROGRAM MAY BE STARTED AT ONE OF FOUR LOCATIONS 
1. STARTING ADDRESS 200 WILL FORMAT THE ENTIRE 
PACK AND THEN VERIFY THAT THE HEADERS HAVE 
BEEN WRITTEN CORRECTLY. 
2. STARTING ADDRESS 250 WILL ALLOW THE 
OPERATOR TO SPECIFY A PARTICULAR HEADER TO 
BE REWRITTEN AND VERIFIED 
3. STARTING ADDRESS 300 WILL FORMAT THE ENTIRE 
FS AS'ey ne oeaaten. "SPER FoRRATTING 
THE BER rc VERIPTED. : 


4. STARTING SS ALLOWS THE OPERATOR TO 
VERIFY ALL READERS ON THE ACK. 


4.3 PROGRAM AND/OR OPERATOR ACTION 
1. LOAD THE PROGRAM INTO MEMORY USING THE ABS 
LOADER. : 


@. LOAD DESIRED STARTING ADDRESS 
3. SET SWITCHES (SEE SEC S.1.1) 
PRESS START 


S. WHEN THE PROGRAM IS COMPLETE, IT TYPES OUT 
“TEST COMPLETE” AND HALTS. 


5.0 OPERATING PROCEDURE 


5.1 OPERATIONAL SWITCH SETTINGS 
AFTER LOADING STARTING ADDRESS SELECT THE DESIRED 
SWITCHES. 


PERCE RS SPORES 
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SWITCH SETTINGS ARE: 


Sc15>=1 tne WALT ON ERROR 
att et. 222 IN T pPRINTOUT 
CID. cokes 
ho ange ior 
SW<10)21..... BELL ON ERROR 


SUBROUTINE ABSTRACTS 


TRAPCATCHER 
+2” = “HALT” SF IS REPEATED FROM 0-776 TO 
XPEC FEENCE 


Aa” 
CATCH ANY _UNEXPEC APS. ANY UNEXPECTED 
TRAPS OR INTERRUPTS WILL HALT AT THE VECTOR +e. 


ERROR HANDLER 


eS te eS IS cetera? UPON DETECTION OF AN a 
1 STATUS, AND RELEVENT E 


PDP=1 RROR 
HEE LO Mor cles oe tes 
ERRORS 


ERROR PRINTOUTS 
#1 ERROR MESSAGE FORMAT: 


ERROR AT ADDRESS XXXX_ PS= PROCESSOR STATUS 
CALLED FR TENT TINE one AT YYY 


oF cONTENTe OF Gets 
= CONTENTS OF RPDS 
XXXX = WHERE THE ERROR WAS 


YYY = IF THE ERROR WAS ENCOUNTERED IN A 
SUBROUTINE, THIS ADDRESS REFERS BACK TO THE 
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MAINLINE CODE WHICH CALLED THE SUBROUTINE. 
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#2 ERROR AT ADDRESS XXXx PS= PROCESSOR STATUS 
CALLED FROM SUBROUTINE AT 


CYLINDER TRACK SECTOR 


BAD 
MESSAGE IS GI IF AN ERROR OCCURS WHILE 
VERIFYING A GOOD EQUALS THE EXPECTED 


CONTENTS OF THE HEADER AND BAD EQUALS WHAT WAS 
ACTUALLY FOUND IN THE HEADER. 


THIS 


RESTRICTIONS 
NONE 


MISCELLANEOUS 


EXECUTION TIME 


AFTER PERFORMING THE SELECTED TASK, THE PROGRAM WILL 
TYPE TEST COMPLETE AND HALT. 


STACK POINTER 
THE STACK IS INITIALLY SET TO 600. 


PROGRAM DISCRIPTION 


HO1 
OZRPO.P11 
T yyy : 
GOOD ° - ft 
| 
| 
: 
| 


STANDARD FORMATTER 
ONCE STARTED THE PROGRAM TYPES: 
UNIT 


a tr FOR INPUT. RESPOND WITH THE RELEVENT 
NUMBER (0-7) AND TERMINATE WITH A CARRIAGE 
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es4 
23s PAGE 7 
236 
e937 
238 7 
S09 SET THe RPLIC WRITE ENAGLE.SUITCH. 
301 SET THE SELECTED UNIT WRITE ENABLE SWITCH. 
23 STRIKE ANY TELETYPE KEY WHEN READY. 

STRIKING ANY KEY CAUSES THE FORMATTING OPERATION TC 
30S BEGIN. WHEN DISK HAS BEEN FORMATTED, THE TTY 
ted PRINTS: 

THE FORMAT SWITCH TO NORMAL. 
is STRIKE ANY TELETYPE KEY DHEN READY. 
STRIKING ANY PROGRAM TO ENTER A 
READ/ COMPARE - WHEN COMPLETE THE 


QUE 
PROGRAM TYPES TEST COMPLETE. 


9.2 SINGLE HEADER FORMATTER 


ONCE STARTED, THE PROGRAM QUERIES FOR THE UNIT 
NUMBER AS IN'9.1. THE PROGRAM THEN PRINTS: 
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AS coe. Fee eTOER thes 
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9.3 SPECIAL FORMATTER 


ONCE STARTED, THE PROGRAM QUERIES FOR THE UNIT 
NUMBER AS IN’9.1. THE PROGRAM THEN PRINTS: 
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RESPOND WITH THE FIRST DESIRED SECTOR NUMBER. THE 
OTHER NINE NUMBERS ARE REQUESTED AND SPECIFIED IN 
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LIKE MANNER. ONCE A ag NUMBER HAS BEEN USED IT 
CANNOT BE SPECIFIED AGAIN 


AFTER THE uOst Pa PARAMETER 8S EN PROCESSED, THE 
PROGRAM THE THE DESIRED FORMAT AND 
THEN ENTERS 4 READ/ conan HEADER SEQUENCE TO ENSURE 
THE IDITY 9 L ADDRESSES. WHEN THE PROGRAM IS 
rrsnep I TYPES i COMPLETE AND HALTS 
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367 ;RP11 DISK FORMATTER 
368 sROBERT J. COLLINS 
#3 ; JANUARY 29,1971 

371 177570 SR=177570 ; SWITCH REGISTER 
7e 177776 CC=177776 sCONDITION CODES 
73 177560 TKS=177560 

374 177562 TKB=177562 

375 177564 TPS=17756 

376 _ 177566 TP8=177566 

377 _ 000060 TKV= 

28 Oo0C54 TPV=64 

380 000015 CR=15 

381 000012 LF=le 

382 000006 SP=%6 ;STACK POINTER 

383 000000 RO=%0 

384 000001 R1l=%1 

385 ooco02 =%e 

386 90003 R3=%3 

387 900004 R4=%4 

288 oooocs RS=45 

389 000005 R6=%6 

330 000007 R7=%7 

ool 000007 =4%7 

392 oooooe = 

333 177776 PS=CC 

334 000240 NOP=240 

335 000000 =0 

336 000040 P1=40 

397 100 P2=100 

3398 000149 P3=140 

339 0200 2 

400 000240 =240 

401 090300 P6=300 

402 000340 P7=340 

403 000001 BO= 

404 ooo002 Bl=2 

405 900004 Best; 

406 000010 B3=10 

407 000020 P4=20 

408 8S=40 

409 000100 B6=100 

410 000200 =200 

411 000400 B8=400 

412 001000 ae 

413 002000 B10=2 

414 004000 B11=4000 

415 010090 Bl2e=10000 

416 020000 B13=20000 

417 040000 B14=40000 

4] 100000 B15=1 

41 104000 ERR=EM 

420 104400 ERM=TRAP 


000052 
00s' 
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.MACR ANDI 


BIC #-A-1,B ; BHaSK A APPLIED TO B 

ENDM 

.MACR PNTM A 

MOV #0, RO :PRINT MESSAGE 

JSR PC; TYPOUT *POINTED TO BY A 

.ENOM 

.MACR PNTOL A 

MOV A. RO sPRINT 6 OCTAL 

JSR Pt, PNTOCT *NUMBERS IN A 

.ENDM 

20 

“REPT 140 

ites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
.ENDR 

ites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
tes ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
.+28_ ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sie ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“ites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
tee ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sites s TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ites ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
‘tee ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


+2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
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477 900056 900009 HALT 
478 900060 000062 .% ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDPESS 
479 000062 00000 HALT 
480 9000064 O00066 +e ;TROPPED OR INTERRUPTED TO PREVIOUS ADORESS 
481 900066 000000 HALT 
482 000070 000072 -%2 : TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
483 900000 HAL T 
484 74 pnae .%2 ; TRAPPED OR INTERRUPTED TO PREVIOUS AOCRESS 
485 HLT 
486 000100 900102 +2 ; TRAPFED OR INTERRUPTED TO PREVIOUS ADDRESS 
- 487 etter 000000 HALT 
488 000104 000106 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
489 OTe 000900 HALT 
480 000110 O90lle +e. ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
491 pelle BRRNe T 
4S2 114 116 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
493 000116 00009 HALT 
4S4 pte GOES +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
495 1 HALT 
496 O001e4 000126 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
497 000126 000000 HALT 
498 000130 O00i32 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
499 ede 000000 HALT 
500 000134 000126 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
501 000136 000000 HALT 
S02 000140 O00i4e +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
503 O00i4e 000000 HALT 
S04 O00144 OO014E .+2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
SOS 900146 000000 HALT 
ae cette i Pe ; TRAPPED OR INTERRUPTED TO PREVIOUS ADORESS 
508. 000154 000156 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
509 . 000156 oe HALT 
510 000160 1 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
Sil 000162 000000 HALT 
Sie 000164 OO0166 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
513 000166 000000 HALT 
eid poate 0001 tert ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
S16 900174 000176 +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
517 000176 000000 HALT 
518 tah +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
519 HALT 
ei 000206 seer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
read +2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


; TRAPPED OR INTERRUPTED 1. PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
+2 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
+ ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
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ae ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“fer ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“fey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADORESS 
“ey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVICUS ADDRESS 
ste ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fee ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ey sTRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“2, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“2, ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sie ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
se, ;TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sie ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
2 TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“fey ; TRAPPED-OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
fet ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADORESS 
sey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
“fey ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
ster ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
48 ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
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; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADORESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


. 3 TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
- ; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 


; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 
; TRAPPED OR INTERRUPTED TO PREVIOUS ADDRESS 





r te ee mes we ee ee eee 





i 
: 
| 


t 
' 


Poke Soe e Oa se 


000576 


000000 


RP11C pix PACK FORMATTER 
OZRPO.P11 


MACY11 27(732) O4-NOV-76 14:24 PAGE 18 


MOV #START1,PC 
MOV aSTART2, PC 
.2300 

MOV sSTART3,PC 
MOV #STARTY, PC 


= eee 8 ee ee eee 
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DZRPD. 

6&5 .TITLE RPIIC DISK PACK FORMATTER 
bbe ;SBTTL #% STANDARD FORMATTER ## 
658 sTHIS ROUTINE WILL FORMAT THE ENTIRE PACK AND THEN VERIFY 
B63 THE HEADERS ‘WITHIN EACH SECTOR. STARTING ADDRESS IS 200. 
b2l 900600 912706 000600 STARTL: MOV uSTART!, SP s INITIALIZE STACK POINTER 
bre 0 012767 OO0340 177164 MOV ¢ #P7,CC sLOCKOUT OTHER DEVICES 
B53 -Popeia OoNre? 002310 i: Jk pe,uNto SCLEAR THe WORLD 
pop Pooese wore: tere ;PRINT NESSAGE 
B58 presse tad JSR ah BOT sPOINTED’ TO BY SWMES 
28 000630 004767 003134 JSR WAIT FOR KEYBOARD RESPONSE 
680 
681 000634 004767 002470 NS2 JSR PC, HOME sHOME SEEK 
bee 000640 012777 000732 006172 MOV #RPT, IRPIV *RP11 PI VECTO 

0006% 012777 900340 006166 MOV #P7, ORPSV :RP11 PI STATUS 
Ge Gamers later Gh Gt FS HallMloecs AREY GBR etGen crores wrt ox on 
BB 0006 1676? 177100 ~~ HOV #Py a *LOWER CPU PRIORITY 
£88 ppee78 Bt eeE7 1 005770 "MOV #1 TOG1 atid OUT 
689 000710 020477 006070 IL3 CMP R4, IRPDA sHaS ADDRESS CHANGED? 
690 000714 001370 BNE Le sYES = fee YCLE 
691 000716 005367 005756 DEC 1 NO - MSEC. TIMED OUT? 
£33 Seesse | Sone ERREDS+CSSEREDA ik kere Cie ROT CHANGING IN TIME 
a a a Pf ren 
£96 eed nea 1 006024 BIT RIE secs : 2 
faa poome fodces PERGER B1OK! i eROR DURING FORMAT GENERATION 
£93 eee 7 OO0S466 RPIX: JSR HR Restos RESTORE RO-5 
700 000754 POP *POP OLD PC 
701 .IRP BL 
706 oat mov (SP)+,B ;;POP STACK INTO B 
704 000754 012746 000634 : MOV #NS2, -(SP) sPUSH A NEW PC 
705 000760 900002 _ RT *EXIT 
706 900762 032777 006000 PIOKI: BIT #87, 3RPCS sDONE? 

i - ERRACSHERSCS XTRA PI DURING FORMAT PASS 

oe ees abares BR RPIX im iti 
710 000776 004567 oDS44O JSR RS, RESTOS j RESTORE RO-5 
711 ‘001002 POP *POP OLD PC 
zig .IRP 3B.) 
73 f mov ° (SP)+,8 POP STACK INTO B 
715 001002 012746 001030 ; MOV  - #STRY, -(SP) sPUSH ANEW BC 
7 001006 o0d0d2 RTI “EXIT TO PASS 2 
718 | 
719 001010 012706 o0D600 STARTY: MOV #START1, SP 
720 001014 012767 000340 . 176754 MOV #P7,CC 





ae nee a nee + eee ee 
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001 
eae 
ze rate 12767 000340 176740 STRY: 
Bis gam pes 
o5— Doloss Olev?? OOOGdL OOS7I0 PeLi: 
6777 005704 : 
ts. 
a 
734 001110 112777 OO0011 onsese 
735 OO111g 036777 008600 005634 
539 Sotise tiers? 000377 
738 O11 G3e777 OOOO OOSEI6 
oa3 bolus 
pie OOLISS Ble77? 176650 OOSEIE 
mus Bolles Bere? be 005612 
744 OO11G4 052777 014000 005576 
| fae Batson bk8%%> TBpeoe posses 
Sn 
Pa Bush ieee 
5 
754 001216 005067 ooss04 PON: 
| 8B Boies bie7e4 pozeud 
| 9 Doles OON767 Oueez2 P2L3: 
Fe PE ES a 
| we Oolets 026727 OO0S460 000011 
a1 4 Tt 
| Fee Bier 101 wees 
| 767 001300 nad 7772 
| reg B31 7 18 
| 7A nee ibis 000625 
| 775 001334 Srey 
776 001340 
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“SET 
fsR PC,UNIO 
MOV #P7,PS 
PNTM  NSWMES 
MOV SNSWMES, RO 
JSR PC, TYPOUT 
JSR PC; RIN 
MOV #1, aRPCS 
MOVB - UNIT. aRPCS1 
JSR PC, HOME 
CLR cyl 
MOV CYL, ORPCA 
CLR JRPDA 
MOVB #11, aRPCS 
BIT TNB, aP 
MOVB 4397, aRPDS 
BIT #811, aRPDS 
FeterwcetBeon 
MOV #-600. , IRPWC 
Hoy aINBLF , orPeA 
MOVB oe 
BIT 8) B7, ARPCS 
BEQ 
BPL pont 
ERR+ER+DS+CS+0A 
BR P2L2 
CLR HED 
CLR SEC 
MOV SINBUF RY 
JSR PC, CHKAD 
NOP 
INC SEC 
CMP SEC, #9 
BHI . +6 

P2L3 
CLR SEC 
ANS HED, a1. 
BHI .+6 
IMP P2L3 
CLR HED 
INC CYL 
a ne 
au P2L2 
HOV BeNOR 
JSR PE YPOUT 
HALT 


;LOCKOUT PI’S 
;PRINT MESSAGE 
NSWMES 


;POINTED' TO BY 
;WAIT FOR OPERATOR 
RP11 


iy SEEK INCOMPLETE ON PASS2 SEEK 
*READ ONE CYLINDER OF HEADERS INTO 
: BUFFER 

310/15 HEADER MODE 

"READ HEADERS 

*ERROR OR DONE 

pi YET 


ERROR ON READ HEADER OP. 
;RECYCLE 


;START ADDRESS CHECKING 
fo ER 10 GOOD DATA 


= CHECK NEXT ADDRESS 


ge vem 


:YES 

;NO- CHECK NEXT ADDRESS 
;ADVANCE CYL# 

DONE ALL? 


igs READ ANOTHER BLOCK 


;PRINT MESSAGE 
;POINTED TO BY ENDM1 





_———=— «4 


HO2 
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PACK FORMATTER MACY11 2°(732) 
#% STANDARD FORMATTER #* 


DISK 
Pll 


2p REE 


ee ee ee ee rs ee ae ee re ee ee ce ee oe mee we eee ae eee S 






PACK FORMATTER MACY11 27(732) O4-NOV-76 14:24 PAGE 22 
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~ 
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DZRPD. #&® SINGLE HEADER FORMATTER ¥* 
re .SBTTL #% SINGLE HEADER FORMATTER ** 
sTHIS ROUTINE ALLOWS THE OPERATOR TO SPECIFY A PARTICULAR 
783 “HEADER TO BE FORMATTED AND THEN VERIFIED. THE STARTING ADDR 
ce 1S 250. 
? TART2: MOV #START1,SP sSET STACK POINTER 
oe POISE isos Booseo izeuee OTe HOY Ses heee ITOCKOUT PI 
788 001354 RESET *CLEAR THE WORLD 
89 001358 004767 001546 JSR PC UNTO *GET UNIT 
791 raked 012700 006116 MOV #HDMS, RO PRINT MESSAGE 
3 oot es 004767 36 in ISR PC TYPOUT sPOINTED' TO BY HOMS 
te ° 
794 001372 012700 006207 nov RO PRINT MESSAGE 
795 001376 004767 O0S226 JSR PC, TYPOUT sPOINTED TO BY 
oa Dolube poise? oles Wee OBCBARIN Ee E PARCRETER 
797 O01 1644 J PC, PARIN “FETCH P T 
798 001412 000767 BR HL “ERROR RECYCLE 
739 001414 016767 005316 MOV WORK1.CYLA >SAVE VALUE 
800 001422 01 MOV $19. RS *HIGHEST TRACK 
801 OO LNeb 00476 1624 JSR Fe PARIN ;FETCH PORANE NETER 
ate iste 16767 005252 005300 MOV 1,HEDA : VALUE 
804 O01442 004767 002202 JSR PC, TTLO : Pp 
80S 001446 BR HL : RECYCLE 
Ries tae, ome gee Fg SFO 
we We: PRIM «NEARS $SAVE VALUE 
810 atts 01 006222 MOV #NEWMS, RO sPRINT MESSAGE 
811 OO1466 004767 005136 JSR PC. TYPOUT ;POINTED TO BY NEWMS 
812 001472 012705 000625 #405. .RS *HIGHEST CYLI 
813 001476 767 O01SS4 JSR PC, PARIN *FETCH PARAMETER 
ci tale THEE? ooeooe ooccie =| Ay Mihcaen «Henrie 
bicrair e 
B16 ravtee O1e705 AnH yaa AE * HIGHEST YE cK 
1 1516 767 001534 JSR PC: PARIN FETCH PARAMET, 
| oe Ot eG BOUTS oosiee 005174 BBy He HED RIO Vat 
ceo Guise Give elie ek eATTIO © EETEw Paneren 
ce Bien pia, mou great Hagtegy STOR 
i s 
Pal 001546 ATABE? 005156 MOV RO, SEC *SAVE VALUE 
| Boe 
827 
| 828 001552 005067 O0S4E6 HGO: CLR INBUF ;HWRD1=0 
B23 001556 016767 005146 o0s464 +4 * HWRDS=SECTOR 
| 630 O015b4 Oib7é7 005134 005454 
B32 iste 006167 prea 
33 Oo 1b0e 006167 440 
| 834 O01 006167 005434 
| 835 O01612 006167 005430 


on Oe = RE A OH EES Aw - ER OS EN 


ge 
~~ 
~~ 
oO 


SCRE RER PARR EA La sae dase inal uk eee SBE RPA 


Br PACK FORMATTER 
ll 


MACY11 ec (73e) 


## SINGLE HEADER FORMATTER * 


oos4e4 


ig 


Shae 


“ 


na 
SRS 


8 
g 


ue 


S8888888SSS888sSssssss 
: 


Pee Bae Pe fn pe Pane fens Bee pee Fine fe fw Pe pis Hae hs Ge 


SSseaaz2aast 
ae 


a 


= 
rT 


‘ 


— 
- 
4 

— 
ry 
—_ 


ssa 


ee 
BERS 
: 


x 
4 


007244 
001376 


4 


Bg 


ba ios 


Sen 


i 
| 


005412 


ROL INBUF +2 
ROL HED 
BIS HED, INBUF +2 
ROR HED 
BIC #100001, INBUF+2 
HGL1: JSR PC, HOME 
MOV #-3 
MOV #INBUF , JRPBA 
BIS #14000; IRPCS 
MOV YLA, JRPCA 
MOVB § HEDA, JRPDAL 
MOVB SECA. aRPDA 
MOVB #3, JRPCS 
BIT #815+B7, aRPCS 
BEQ 6 
BPL HGO1 
ERRCERAD SS CS#DR 
BR HGLI 
HGOl: CLR INBUF 
CLR INBUF +2 
CLR INBUF +4 
HGL2: JSR PC, HOME 
MOV #-3, JRPWC 
MOV #INBUF , JRPBA 
MOV CYLA, ARPCA 
MOVB §HEDA, JRPDAL 
MOVB SECA’ aRPDA 
BIS #14000, aRPCS 
#5, SRPCS 
BIT #815+B7, IRPCS 
BEQ 6 
BPL HGOe2 
ERR+ER+DS+CS+DA 
BR HGL2 
HeOe: eR OBE CHKAD 
BR HGL2 
PNT ENDM1 - 
JSR PE YPOUT 
HALT 
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; HONE SEEK 
*BUFFER ADDRESS 
310/35 Nop MODE HEADER oP 

: TRACK 

: AND "soon TO BE CHANGED 
REWRITE IT 

ERROR OR DONE? 

NOT YET 


; DONE 
sERROR ~~ HEADER OP 


BE FOUND 
310/15 MODE HEADER OP 


t ERROR OR DONE? 
NOT YET 


; DONE 
; ERROR cath READING NEW HEADER 


POINTER 
CHECK "REMRLTTEN HEADER 
sERROR - TRY AGAIN 


PRINT MESSAGE 
;POINTED’ TO BY ENDM1 





02 
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3 
-— 
o 
09 
=i 





DZRPD. #% SPECIAL FORMATTER ¥* 
es .SBTTL ## SPECIAL FORMATTER #% 
sTHIS ROUTINE WILL FORMAT THE ENTIRE PACK USING THE SECTOR 
fee ; ADDRESS SEQUENCE SPECIFIED BY THE OPERATOR. THE STARTING 
1 START3: MOV sSTARTI, SP SET STACK 
ees erate Bis 8 rarer 175666 MOV , #P7,CC ;LOCKOUT PI 
891 OOelle Beare? 001012 JSR PC, UNIQ GET UNITS 
892 O0e116 SFSL1: PNTM  SECMES 
893 11 912700 004025 MOV #SECMES, RO SPRINT MESSAGE 
Bee posize OONTE? DooaSS Dy I PPEAR FLAG. STRING 
B36 O02} 32 12767 177766 004540 MOV #10. , TOG) 300 BELOW 10 TIMES 
Bag oosl44 12708 O03072 Hoy eee 4 a a en 
S33 SoSiee DANTE? oo4use va (RS)+ RO reat cone 
ane Bostes paves CONE yr ESIN iGET BARAME TER 
903 002164 7 004510 INC TOG1 * DONE? 
804 002170 001367 BNE SFSL2 NOT YET 
905 002172 004767 000476 SFSL3: JSR PC. MKBUF *GENERATE A TABLE OF ADDRESSES 
208 002176 116777 16 OO4SE6 MOVB - UNIT, JRPCS1 RESET 
002204 767 001120 J PC, HOME *SELECTED UNIT 
Se eee Oe ee cess seu: Ge Et areca | Goulties 
910 passes "CLR aRPOA *DISK ADDRESS 
911 002226 004767 000540 ISR PC, SEKE > SEEK 
912 002232 BR srot3 j ERROR RETURN 
913 002234 Ol 176650 004532 MOV 8-500. DRPWC RETURN 
914 O0ee42 012777 011544 Oovbee MOV #OUTBUF,aRPBA WCBCA 
ai6 092250 052777 014000 Si2 BIS #14000, 9RPCS  :10/15 HEADER MODE 
316 002256 112777 004504 MOVB #3, sRPCS : 
817 002264 35999 1 004476 BIT #815+87,aRPCS ERROR OR DONE 
918 002272 001774 BEQ 3 *WAIT 
313 002274 1oooge BPL “SN1 * DONE 
20 1 ERR+ER+ gtis+DA ERROR ON WRITE HEADER OP 
922 eee Bie 5 7770 004370 SFSNI: MOV #-200. ,T anaalats : 
§23 1 11546 MOV #OUTBUF +2, RS 
924 062715 000100 SFSLS: ADD #100, (RS ; ADVANCE CYLINDER ADDRESS 
aee Boa a8 ane TOG1 * DONE? 
001371 BNE. SFSLS ?NO 
45g Geere7 38 oontes ee a 1 aliases 
a5 1 081 BHI SFCHK :YES 
| =. 931 BR SFSLY : 
| 432 012767 175420 SFCHK: MOV #P7.PS *LOCKOUT_PI 
| 933 116 004336 O04406 MOVB - UNIT, ORPCS1 *SET UNIT 
934 00476 JSR PC, HOME “HOME SEE 
| gee BTEye> BpMS24 OOM37E SFCLI: Moe cvt ORPCA i omRD 
| 937 he poeor? BOWS * CLR —aRPOA t SAR=O 


| 
i 
{ 
i 
{ 
' 





REC COPD Se SRS oRe ole 


Sees EBS RR SONS sal lol sans 


a er a ee eee 
‘ 


3 


RP11C ig PACK FORMATTER 
OZRPOD.P 


MACY11 Bh Lt 


#& SPECIAL FORMATTER * 


GOG2eo 


170650 
007244 


40) 
00 
100200 


004352 
004346 


904332 
4324 
004316 


SFCNI: 


004204 


SFCLe: 


CLRS: 
CLRS1: 


SIN: 


SINI: 
003776 MKBUF: 
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Isr PC, SEKE 
MOV #-600. , IRPWC 
MOV SINBUF , JRPBA 
BIS #144009 DRPCS 
MOVB aRPtsS 
BIT no 5087, ORPCS 
BEQ 

BPL éF But 
ERRSERHDE COTA 
BR SFCL1 

MOV #SCSLT,.RS 
MOV #-10., t0G1 
CLR HED 

MOV INBUF , R4 
MOV (RS)+, SEC 
JSR PC, CHKAD 
NOP 

INC TOG1 

BNE SFCL2 

MOV #SCSLT.RS 
MOV #-10., T0G1 
INC HED 

CMP HED, #19 
BLos SsFcle 

CLR HED 

INC CYL 

CMP CYL, #405 
BLOS  SFCLI 

PNTM  ENOMI 

MOV #ENDM1 RO 
JSR PC, TYPOUT 
HALT 

MOV #-30. RS 
MOV uscoLT, RY 
CLRB 

INC RG 

BNE CLRS1 

RTS PC 

JSR PC, RIN 
JSR PC’TTO 

SUB #260, RO 
CMP RO, #9 

BHI SIN 

TST RO 

BMI SINL 

TSTB  SCFLGCRO) 
BNE N 

COMB § SCFLGC(RO) 
MOV RO, (R4)+ 
ADD #2) (SP) 
RTS 

MOV #-20. , TOG! 
MOV woUTBUF RS 
MOV SLT, RY 


» SEEK 
‘ERROR RETURN 
;CA 
:10/15 HEADER OP 
-R 
; ERROR OR DONE? 


;NO 
JUMP IF DONE 
READ HEADER ERROR 


:LOOP 
:SETUP SECTOR LIST AND 
: COUNTER 


SETUP GOOD DATA 
: SETUP BUEFER POINTER 
*FETCH A SECTOR 
*CHECK ADDRE 

NO LOOPING 

?DONE ONE SURFACE? 
YES = RESET 

‘SECTOR PARAMETERS 
SADVANCE TRACK 


ROME” 
SYES - RESET HEAD 
ADVANCE CYLINDER 


NOT YET 


PRINT MESSAGE 
;POINTED’ TO BY ENDM1 


om EAR 

: THE SECTOR 
:SLOTS AND 
:FLAG POINTERS 
EXIT 


THEN DONE 
jARSEMGLE 


HO 

A LIST OF 
‘LOGICAL SECTOR 
Se it tee 


MALL? 
phe: ARE LEGAL 


sHAS THIS NUMBER BEEN USED? 
THIS NUMBER ALREADY USED 


SER ROR - 
T 


;STORE SEC# 
sADVANCE RETURN 
iA XIT 


; TOG1=COUNTER 
;RS=POINTER TO BUFFER 


;R4=POINTER TO SECTOR LIST 


RELIC DISK PACK FORMATTER | MACY11 (732) O4-NOV-76 14:24 PAGE 26 
DZRPD.P11 #* SPECIAL FORMATTER * 
18 g12767 4 77766 003762 Hoy tae , T0G2 ;TOG2=SECTOR COUNT 
Bee OTe OO OEe ooa7s6 Res CMDR CRS) SOE e aL sHEAD 
ryt ppsces BtSise ey (ryt, (RS)+ i gab Fh 10h 
999 0602734 005267 003742 INC 
1000 002740 901371 SNE 
1008 002742 012704 003072 MOV WSCSLT RY “4 UPDATE POINTER, 
1 002746 012767 177766 003726 MOV #-10., toG2 : COUNTER 
1004 ite 062767 O00002 003726 ADD #2, WORK “AND TRACK 
1005 005267 O0371le INC TOG1 * FINISHED? 
1005 002766 001356 BNE MKBL1 5NO 
1007 770 000207 RTS PC EXIT 
1008 il 000377 003760 SEKE: MOVB #377,dRPDS CLEAR ATTN 
1006 11 000011 003762 MOVB  &11,aRPCS : SEEK 
1010 003008 036777 003710 003744 BIT ATNB, JRPDS WAIT FOR 
1014 003014 001774 BEQ 6 ATTN 
101 16 112777 900377 003734 MOVB #377, RPDS CLEAR ATTN 
1013 032777 004000 003726 BIT #811, 1, JRPDS : DONE? 
| He BR ERIWERICEYOSIOR SEEK. TNCONPLETE 
| $017 062716 oo0002 ADD #2, (SP) : 
1018 000207 RTS PC *EXIT 
101 004113 NSTR: NO 
1020 0030S0 004120 Ni 
1021 003052 004125 No 
1022 903054 004132 N3 
1023 003056 004137 NY 
1024 003060 004144 NS 
ibe need poate N7 
ioe? Oosbee bodies NB 
1028 003070 004170 N3 
10239 003072 SCSLT: .REPT 12 
1030 ‘WORD 0 
| 1032 003072 oD0000 WORD O 
| 1033 003074 900000 WORD O 
1034 003076 000000 WORD 0 
1035 003100 o00000 WORD O 
' 1036 003102 op0000 WORD 0 
| 1037 003104 000000 WORD 0 
' 1038 003106 o00000 WORD 0 
| 1039 003110 oo0000 RD O 
| 1040 003112 o00000 WORD O 
104 003114 00000 WORD 0 
1 
' 1043 003116 SCFLG: .REPT 12 
i 1044 ‘BYTE O 
| «1045 ENDR 
| 1046 903116 000 "BYTE O 
' 1047 117 000 BYTE 0 
1048 003120 000 BYTE 0 
1049 003121 000 BYTE 0 





ooo, 


ee en a ae er te oe — eee. 





RP11C DISK PACK FORMATTER MACYL1 27(732) O4-NOV-76 14:24 PAGE 27 
DZRPD.P11 #& SPECIAL FORMATTER ## 


1050 122 000 Te O 

i oa |B ae 

1 1 ut YT : 

l 31eb Coo BYTE 0 

1055 003127 000 BYTE OG 

ipes 

128 00 130 UNIG: PNTM  UMES 

1060 603130 012700 o04014 MOV #UNES. RO sPRINT MESSAGE 
1061 003134 004767 003470 JSR PC, TYPOUT sPOINTED TO BY UMES 

- 10be 003149 004767 O00504 JSR pC, 1110 sREAD UNIT 8 

iBe3 oos4e 000007 CMP RO, #7 if59 BIG 

1065 1S2 101366 BHI t : 

ibe? DOsIeO DLoTBO boRbar yw BOVE RHINE ATTENTION BIT 
1068 ppsieH heed 003530 TST ti :NO ROTATION 

1g98 DOSI7e BITES 903522 ooD04 oY CONEY. DSi tAUIMBER OF ROTATES 

1300 ppsa76 pares ati JSR « PC,RTL *TO DETERMINE ATTENTION BIT 
1072 003204 000001 DSi: .WORD 1 "1S PUT HERE 

1073 010067 003510 UNS1: MOV RO,ATNB :SAVE BIT 

1 le 116777 002502 o035S2 MOVB - UNIT, aRPCS1 >SELECT UNIT 

1075 003220 032777 100000 003532 BIT #815; JRPDS IS IT READY? 

1076 003226 1401 BEQ +4 *NO 

1077 003230 RTS PC *YES = EXIT 

1078 003232 104434 ERM+DS+ER+CS *SELECTED UNIT READY NOT UP 
1079 003234 000766 BR UNS1+4. *LOOP UNTIL FIXED 

1080 E SPACE: PNTM — SI 

1081 012700 006154 MOV #S1,RO sPRINT MESSAGE 

{bes DOse4E posaey DOstPd yok PC, FYPOUT PRINT RUMBER OF. SPACES 
1 phases 1371 BRE SPACE ?IN TTG. TheN 

Se Ooeeet eee 00366 PARIN: eR PE. TIO {READ SOME NUMBERS 

ibe posses cena : 2 +4 This S NOW THE GOOD RETURN 
1089 Space fenne? 00240 BMP ORO, 4240 08 TF arspace? oS SEGUENCE 
1090 pps598 ayes BNE PRX °NO = EXIT 

1091 003274 705 003412 CMP WORK1,RS *T00 BIG? 

1092 003300 101012 BHI PRX “YES = EXIT 

1093 003302 7 003440 INC TTG :TTG=# OF SPACES 

1094 003306 026727 003434 ooD00S CMP TTG, #5 >TOO MANY 

ipse Bosse BONE? 1714 Set OBe space HSTIFY NEXT ENTRY 
bey ppas38 16 haoaa2 ADD #2) (SP) *SKIP FOR GOOD RETURN 
1098 003326 PRX: RTS pc’ *EXIT 

1100 003330 112777 000377 OO03422 HOME: MOVB $ #377,aRPDS CLEAR ATTN BITS 

1101 003336 112777 000015 o034e4 MOVB #15, aRPCS "HOME SEEK 

1102 003344 012767 O00005 003666 MOV #5 DEBUG+74 ;WAIT FOR 

1103 00335 367 003662 WW: DEC DEBUG+174 *SEEK TO 

1104 1375 BNE Whi : 

1105 003360 777 002000 003372 BIT #B10, IRPDS *IS SEEK UNDERWAY? 


"(aes aan einem ee 








DY FORMATTER MACYLL 2T(732) OM-NOv=76 14:24 PAGE 28 
SSAPE.PLT a8 SPECIAL FORMATTER 
sYES 
108 bosrg rate EOS sEReDE ses : i EEK NOT UNDERWAY 
R HO! : 

i; oe T FO 

iis 74 O26777 003222 O03256 BIT ATNB, ORPDS sHATT FOR -. 

Hie i i 904000 093346 BIT #811, 2RPOS :SEEK TieoMPcetE? 
| its pals Toaase BES nape tes sDEVICE STATUS ERROR 

i & Oco744 BR H ; . 

ifig Doses 152777 00023 003324 BiT8 #23, 0RPOSI SAY ERRORS 

ii8 Pa ios ERM+ER+CS+DS sDEVICE STATUS ERROR 

iis bos ME 

ii <4 pe fe . ZRESET THE RP11 
or a ee ba 
| 1150 ii 777 003214 OVE UNIT, aRPCS! :RELOR UNIT# 

tle OO3456 gogen? ; iNET ee 
| iis oases a 12467 Bose grange Soy Cet EDR iFETCH PEA BND 

Libs 0034 Ib7es 32 ee ROR tee _ SUSTIPY HE HEAD 

He bee Beer Be moe 
| tH58 pbs 5 Bpasia RoR VLR 
+135 00351 2 003210 ROR LR 
| 3 Sot ? Sn ROR CYLR co ona 
| 1135 ae Bene? Mike HOV (RN)+,SECR sFETCH “3 ah ahead 
iz peer 042767 177760 003172 BIC 817-1 ,SECR sMASK 1 
«1 BBs 77740 003162 BIC.  s-37<1.HEDR MASK 37 APPLIED TO HEDR 
1132 poseH4 042767 177 0031 BIC =H 
4 77000 0031 BIC 8-777-1.CYLR | ;MASK 777 APPLIED TO CYLR 
| He eeeoe? hosted posted cM CYLACYLA ils CYL# 0k? 
| iB esa 013 ene HED, HEDR 215 TRACK® OK 
1iWe Qe6767 003132 002136 cH HED, : — 
tid oasenD 6767 003124 003130 cH SEC, SECR Is SE k 
} aoc Aa: 
| tise est4 jy ome ave Be. (SP) 50K = EXIT 
11M8 003616 104500 CHER: ioe ss sHEADE - COMPARE ERROR 
i156 BNE De mt - SUBER: PNTM  SUBRMS ane tes 
YPOL! N SUBRMS 
| 1125 er yt us ih Cran RO HFETCH. PC. OF SUBROUTINE CALL 
| Hee ; FO {PC-HeADORESS_OF SUBROUTINE CALL 
He BES ay i fee By mee 
| : T UP TO 5 OCTAL DIGITS 
| HEB poseso pizre7 pooons ooso7o rio: soy gyrase UPTO, oc Ta, 
| Hee SOOOE? DOST TTL: JSR  PC.RIN READ TH CHARACTER INTO RO 
| $161 003666 Ge0027 00021 CMP «RO, #215 











C03 
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MACY11 @7(732) 


#* SPECIAL FORMATTER ## 


C DISK 
Pll 


RPI} 


PACK FORMATTER 





3 4 
ie esr 
yh cee Fak 
a a eee 


1,R0 


Ma! = 


Pewee RET 


Pc, nt, 


seh Sucteaseangpeels Sie 
ot fond 


oe 


5 SBS BB5S5RNRL Pets SBoRa 


OS2i11 UMES: 


-ASCII /88UNIT: a/ 


SNAARAARADRAN 
HIA@BaRwAaaae 
ee ee ee 


Lao 


SSesSSSSeS 


SrVoTPSpes 


ee ATT 
“ai ME 


SECMES: .ASCII /88INPUT THE SECTOR NUMBERS(O-9) IN THE ORDER DESIRED.a@/ 


AOUERUNRREE SOON GETS 8 
B BRRERRRRERAS 
FRRERER AMA RE REST NON, 


BZ SIS5 LCC RLERERER SaPHBRSRERTHRTRRERT 
ak Kae Ree Ke ham Kea Kat Kee Keoe hank he Ram Kam Kame Keam Kemet Keaoe Karn Ramm Keon Ram Re Ram Kern Roe Keen Rok ae oe ee re ee ee ee re oe ee ee er eee Roe Lan Koon han kde hem Kae hen ha eee) 


eR a ee eee ee eee me ene ee 


| ee tee ee mee 


ee ee ne eee a ee 


3 
a 
as 
: 
: 
S 
= 
i 
3 
“ 
ge 


SWMES: 


Gime bob es te 


Ba 


one ee a ee 


t 
| 
' 





DO3 
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MACY11 27(732) 


AL FORMATTER ## 


oF SPECT 


PACK 


-ASCII /SSET THE RP11 WRITE ENABLE SWITCH. / 


Fa 


ersze 
Sianiee 


Deri 


OG Od Od OG a ag OE OF A OE 9 ed Od OH ed Od ed Od Bd Oo 


-ASCII /8SET THE SELECTED UNIT WRITE ENABLE SWITCH. / 
-ASCII /8STRIKE ANY TELETYPE KEY WHEN READY.3a/ 


=ag5 & 
“TUG 


NSWMES: .ASCII /83RESET THE FORMAT ENABLE SWITCH TO NORMAL./ 


pet 4 Com ham} 
eat od FP eo 
Bageutis 


fat 





ASCII /SSTRIKE ANY TELETYPE KEY WHEN READY.8a/_ 


i 
BS 


ZLEREER 


ne ee e+ ee ree =. os 


Go=F25 
Lit 


Becca 


Geicelcetil Gisaed aeelebeaiene 
USUScOSeBEGBSOBSOSEEREE EEBLERLEREOEEOR 


mutt 


Con em Kee Kon hem om em) 


-EVEN 


_ 





: 
a4 
2 
= 
& 
ty 
2 
: 


r 
a 
w 
Se Phe ae 
o = o Ts 
& 25 ao 
55 35 
et eo a he 
irs int iS x 
Rote Mtr 
T Str SSeGr sare 


;RPCS ERROR NOT SET. C(SP) POINTS TO CAUSE 


#814, 0RPCS 
HRN1 
aRPCS 
ORPCS 
Biss 
MOV a(SP) ,ROTOG 


ate 
040000 002172 SFTER: BI 


100000 002210 HRNI: 
000000 O02i42 RTR: 


SSaenores 
See: 


Stat tetta eet 


eG OH CHE ed 9 EE Eg ed ey OH 


nn ene nee 9 mee rene oe = Oe ee eee 


me i ee we ee ee ne we wee eee + eres ete ee er ee eee eee ge eee awe: 







RP11C DISK PACK 
DZRPO.P11 
1274 O04612 
1275 OO¥616 
rattey: 
a ROME SE 
1279 004630 
1 
i5e1 Gonead 
1 44 
Be es 
1285 O04654 
ie 
1 
1289 OO46ED 
tee Eee 
1533 DOMes4 
ess 
iSae GONG 
1237 004714 
1 
He a 
1 
1 
i Bins 
1 
1 
1 
1 ae 
1308 a 
1310 04774 
1311 005000 





TE 
# SPECIAL FORMATTER ## 
oco00e 








8 
yt 


by 


ee Ee Be 88 Ge £8 BS Beer 
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002114 


172702 


172662 


ALD 


RRLUP: CLC 


RTL: MOV 
RLLUP: 


ERROR: 


18: BIT 


#2, (SP) 


BRLUP 
atSP 
#2, (SP 


SEIRSBRES 
To 
oa SF.582 igh Wea 


2B 
a3 


52385 
& 


ae 
a2 3 


$825. 
& 


ace 
4 33 


+00. 


) ie 
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;STEP_ RETURN VECTOR 
;CLEAR THE LINK 
;SHIFT RO RIGHT ONCE 
;F INISHED? 


:YES- EX! 
: fap T 
i GLEBR 
; SHIFT 
; FINISHED? 
YES- EXIT 


T 
is Oe 
Ab LEFT ONCE 


sRING THE BELL? 
sBRANCH IF NO 


;PRINT MESSAGE 


I 
I 


NT 


sAND PRINT 
; TRAP? 


IF=0 


PO NTED 10 BY BELL 
j TEST 0 DELETE SWITCH 


F TTO DELETE SWITCH IS UP 


j HESSAGE POINTER TO KO 


TFIND ADDRESS OF ERROR CALL 


I 
Pant SAVED STATUS 


IT 
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OZRPO.P11 #& SPECIAL FORMATTER ## 
1 767 156 ISR PC, DATYPE sDATA 
1330 Betas Bouse 1334 ERXIT: JSR RS; RESTOS RESTORE ACO-5 
1332 005108 012709 000015 Hoy ACR, RO sERINT ’ 
ii Beetle Regs Bet eue ERXITL: 1245 areas start ER DONE 
1335 005122 00378 BPL ERXITI 
Fs als e767 100000 172436 SIT #815, SR sHALT ON ERROR? 
1 134 000000 XX sERROR HALT. CONTINUE 
1339 005136 900002 1S: RTI EXIT ERROR ROUTINE 
iat 
ie 
1 005140 032767 O20000 172422 LERCHK: BIT #B813,SR ;SR13(1)=LOOP ON ERROR 
1344 005146 00100¢ BNE +6 SEXIT IF 
1345 005150 Bearie 000004 ADD 84, (SP) *ADVANCE RETURN VECTOR OVER LOOP JUMP 
1346 005154 000207 LERXT: RTS C EXIT 
1 156 7 O10000 172404 LUPCHK: BIT #812,SR -SR12(1)=LOOP ALWAYS 
ii pete ated BNE EXIT IF 
1350 DOE 1b 062716 000004 ADD 84, (SP) “ADVANCE RETURN VECTOR OVER LOOP JUMP 
1331 D051 rite RTS EXIT 
1353 005174 912709 GBTYPE: MOV #GOMS. RO sPOINTER TO “GOOD” 
1 1424 J PC. TYPOUT :PRINT MESSAGE 
132d 005204 BEBO 001460 MOV G0OD, RO “FETCH C(GOOD) 
i 10 7 JSR PC PaTocT “PRINT DCTAL 
1 4 MOV #BOMS *POINTER TO “BAD” 
1 1 JSR PC. TYPOUT :PRINT MESSAGE 
| 4359 005224 016700 oo144e MOV Bad, RO *FETCH C(BAD) 
| 1360 004767 000334 JSR PC, PNTOCT PRINT OCTAL NUMBER 
| is 00S234 000207 RTS PC EXIT 
1 005236 O01 00627 CSTYPE: MOV sCSMS, RO ;POINTER TO “STATUS” 
1364 ned Baisee ISR PC. TYPOUT SPRINT TE xT : 
| (3ee 00S 2SE heed Saat 15k pe Pit T PRI TAL NUMBER 
 & DATYPE: RO Fo NTER TO “DATA” 
138 ied MeR Hi ARO *PRINT TES 
1379 001400 MOV DATA, RO *FETCH C(DATA) 
te 0 000270 J E PC, PATOCT ;PR NT OCTAL NUMBER 
Po ot 006301 ERTYPE: MOV FERNS RO BR NT 
| 1374 001316 JSR PC, TYPOUT ;"RPER= 
| 1375 001446 MOV RO PRINT 
1376 000246 JSR ,PNTOCT :RPER 
| f 006311 DSTYPE: HOV a0SHS, RO SPRINT 
| Tes 374 ‘JSR PCT ; RPDS” 
| 3 O Doras Mee ODe patoer ipa 
i I moss fis pC’ ett 
i J 000001 001410 ADTYPE: BI #80, SRPER “ADDRESS ERROR? 
Pe 005354 BEQ 1§ *BRANCH IF NO 
| 1385 005356 


1407 , 
017767 001416 001332 MOV dRPCA, WORKS ;GET THE CLYINDER ADDREEE 








FORMATTER MACYI11 @7(732) O4-NOV-76 14:24 PAGE 33 

## SPECIAL FORMATTER ## 

hia 001414 001322 mv Sey ONKE ;GET HEAD AND SECTOR ADDRESS 
1 


7? O01 
? 0013 
7 


ADT! 
O01eS3 DECTK: BITB S37 .HORKe*I 






001236 BIS $11, WORKe 
001226 DECCY: poy #11411, WORK2 
ADT1: MOV scYMS RO ; PRINT 


3 
TN5S 
Ss 
3 
3 
= 


SeSRREOR 


0 0 02 0 pan 0-2 02 pe Bae 9 po fo pe 3 
Berar evr erirreerer ct i: 
: str 

ee 

A A 

Stateted 

oo 
“2 
: 


OB PFs 4 Fs B&H =m ho hs Pw 





£ 
= 
oOo 





RO ;MASK 37 APPLIED TO RO 


SylBsyeyREsysRSBAR 
: 
", 


3 
3 
d 
: 


se 


"33 
ae 
3 


RO ;MASK 17 APPLIED TO RO 
EXIT 


Bess 
253 


001110 PNTOCT: 
OLUP: 


g 

R 
S333 
5 
: 


042767 177770 001100 sMASK 7 APPLIED TO WORK 
> boomed bolare , 


ADD 
MOV 
ROR 
ROR 
ROR 
001052 DEC T 
13 12767 000005 001042 Bev SEE cH 
14 she ROW (53s RO 
14 7771 Be 61-1, RO ;MASK 61 APPLIED TO RO 
14 JSR PC. TTO 
1437 005656 01 TOLUPO: MOV (SP)+. RO 
1438 00476 000632 JSR PC. TTO 
14 7? 001016 DEC TOY 
1 GT TOLUPO 
1441 0056 TS PC 





£ 


3 
a 


Middetiataatteitiaues see: 


os EEE Bat bh Baw poo a2 Oot ha ho bs hs fe Be fo hp he hf ow He BS 
N“ 
ome 


Yi ghee, 


ORMAT 


F 
ee SPEC 





HOTYPE: tay 


Bd a8 ueIeEy 


agegsessesee 


aF5 
: 


ee 


Sg ga 
- & 38 3B 3d 
gee ee 2 8 
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hen F ORNATTER Le 


sPRINT MESSAGE 
sPOINTED TO BY NPS 


;PRINT MESSAGE 
;POINTED TO BY GDMS 


;PRINT MESSAGE 
;POINTED TO BY Se 


;PRINT & OCTAL 
: IN CYL 


sPRINT MESSAGE 
:POINTED TO BY SI 


PRINT T 
PRINT MESSAGE 
*POINTED TO BY Si 
sPRINT 6 OCTAL 
:NUMBERS IN SEC 

sPRINT MESSAGE 
sPOINTED'’ TO BY CARET 
sPRINT MESSAGE 
“POINTED TO BY SI 


sPRINT MESSAGE 
sPOINTED’ TO BY BOMS 


;PRINT MESSAGE 
:POINTED TO BY S2 


;PRINT & OCTAL 
;NUMBERS IN CYLR 


sPRINT ME 
‘POINTED 73 ay $1 
sPRINT 6 OCTAL 
*NUMBERS IN HEDR 


;PRINT MESSAGE 
;POINTED TO BY Sl 


SPRINT 6 OCTAL 
SNUMBERS IN SECR 


;PRINT MESSAGE 
;POINTED TO BY CARET 





PACK FORMATTER 
## SPECIAL FORMATTER ## 


MACY11 27(732) 


0 0 ph he pe po 
Be = 
Be 


Baaananaae 
ee 


— 
rv 
- 


po b-2 > b= Bs fs he be Bo fe Boe fe 
8 


UIUTUTUNUU Uri 
OO oe pe 
OnNOUCWle-oO 


Sh 





z 
ue 


Nu 


a8 88 fe Oe Sa Sy 


_ 


0 b= 0 pn ben Be pan San ae ne Bae Pe ae Pas Pe an =n Dae Has Pas Hs Pee me Pe Pn ne se Pe ne ne He Pe ne ne Pn Has 


BREESE SeRE oo OEM EORE OOO NOON ONE oe 
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48 CYLINDER TRACK SECTORG/ 


4 @/ 
4 @/ 
/8a/ 





/8BERROR AT ADDRESS a/ 


/80LD: 
/BNEW: 


/8CALLED FROM SUBROUTINE AT a/ 


/8RPCS= a/ 
/SRPER= 9/ 
78RPDS= 2/ 
/&CAR= a/ 

/ TAR= @/ 
/ SAR= 9/ 
78G000= a7” 


/BAD= a/ 
/ PS= a7 





P 0 0 9 pe pe 


AS a Has Sg 


bs het fan BS Bh ht be Bs be te = Ob bh be = = bh bs Be bf bh sb bh be ho te pe be ph he pe he Re 


PP ibiesn Rosine ht atta ee NR 


he 





RP11C DISK PACK 
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es 
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## SPECIAL FORMATTER ## 


O46 O40S04 O40524 DAMS: .HSCII /8DATA= a/ 
020075 100 


052105 


e4 123 ENDM1: .ASCII /&TEST COMPLETEd/ 
Bigs poelgs S COMPLETE® 


040007 BELL: .ASCII <7>7d/ 
EVEN 

010446 SAVOS: MOV RY, -(SP) sSAVE RO-RS ON THE STACK 

10346 R3,-(SP) RS WAS STACKED BY THE JSR 

des MOV Re, -(SP) *RU-R3 ARE STACKED ABOVE IT 

101 MOV R1,-(SP) *WITH RO ON TOP 

10046 RO; -(SP) *RS HOLDS THE RETURN PC, BUT AN 
000115 IMP (RS) *RTS WOULD POP THE STACK-SO JUMP OUT 
005726 RESTOS: TST (SP)+ ;MOVE SP OVER WORD SAVED BY JSR 
012600 MOV (5P)+,RO : 

1260 MOV (SP)+°Ri ARE POPPED 

1 MOV (5P)+’Ro IN LIFO 

1 MOV (5P)+°R3 : £ 

12604 MOV (5P)+;R4 *RS IS POPPED BY THE RTS AND 
000205 RTS RS ;THE PC IS TAKEN FROM 

1 000012 DECPNT: MOV #10. Re sDIVISOR OF 10 FOR DECIMAL PRINT 
po ie BR DECREM *PROCESS AND PRINT 
12702 000010 OCTPNT: MOV #8. .Re *DIVISOR OF 8 FOR OCTAL PRINT 
004767 DECREM: ISR FC, Dive sDIVIDE (RO) BY (R2) WITH REMAINDER IN RI 
eat TST RO’ HAS NURSE NOER ATED BELOW RADIX? 
STE? 177762 Ee OE DEC NS DIVIDE RUMEEN BY RADIX 
Gj 2600 POPTT: MOV PEpde ae ;POP BE TOE ARK 
DD 171044 TTO: Err SBrarSR iE ERitct DELETE TYPEOUT 

1019 "BNE TrOLeoe ‘EXIT 
a ne gprs oF 

£8596 + Be Tete ?NO = KEEP LOOPING 
om Co eS 
eosen7 g PC + RETURN FF Dobty OR RIN PROGRAM 

12700 000012 TTOLF: MOV #LF,RO PRINT LF 

000750 0 sEXECUTE PRINT 

7 000114 IDIVR: MOV RO, DIVID sSAVE DIVIDEND 
CLR RO *CLEAR QUOTIENT AREA 

D500! CLR Ri ‘CLEAR ACCUM. 

N60201 DIVLP: ADD Re, Ri *ADD DIVISOR TO ACCUM. 

tae couae a ae ote ery 
ean I Br ; INCREMEN QUOTTERT WER 

000772 DIVLP ADD AGAIN 

001003 DVEND: BNE DIVNI : JUMP TO GET REMAINDER 
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CIAL FORMATTER # 










DIVIO,R1 TO Ri 
ext writ ou QUOTIENT IN RO 


DZRPD. 
1b eae sem me ee oe 
: oven: 8 BBN FEE nen 
: 
1 


POOP KKS ao 


PC 
TYPOUT: MOV RO,- 


THY 


3h 010045 TypouT: mov, RC (SP) iS ack RODRESS POINTER FOR MESSAGE 
* CMP #100,R0 HS. i ac YeRmiNATOR)® 
621 001411 BEQ TPOUTX 
#46, RO ts sf ERLE FLAG? 


$YES- CHANGE DATA TO CRLF 
(SP) : MOVE POINTER TO NEXT BYTE 
TPOFCH FETCH NEXT CHARACTER 

:POP STACK TO REACH RETURN VECTOR 


w 


aye 

ees 

Sr ouzuozs 
os 


(SP)+,8 ;;POP STACK INTO B 
;EXIT 


es att 


Zz 
4 
w 
vo 
Oo 


BEUPRALERO OSS GbR LORS ROR EE 


2 
| a 
BS5E SE SESE SE SESE SESESE SS SESE SEE SE SESE TS 3S BE ISTE BS 35 35 3S 





REERLS 
o— 
ce 

N43 
Pateattateal 
NNNGN 

ae et fre ee 
QWrue-O 


ne ee ee ee er ee ee ce nme 
‘ 
‘ 
' 
‘ 
‘ 
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-Pll #& SPECIAL FORMATIER ## 


RPDAi: 176725 


REAR 








ee : 
° 3 oe 
2 





1686 WORD 

1687 56 -WORD 256 

1688 : XX 

1689 7244 INBUF =DEBUG+200 

ipa 011544 OUTBUF =INBUF +2300 

1632 

1693 090001 - END ;THAT’S ALL FOLKS! 





en 








a 
WWW) 
bas 
Downe 


= bs pe pe 





# 


2 
a 


Coo webiieeenraocea ee 


FER Nw 
sea 


BUR S 


Sour Seas 


i=) 
we 


a on Bas b= Bae Bes bo hs Dee Be poe fe 
se 


Ow 


14028 
1109 16478 


1383 


illl 


849 865 917 4S 1975 1264 1336 


849 BES 917 945 


787 889% 









624 
708 740 749 8Se 868 920 948 61015 1078 # i107 








770 681S* 830 908* 909 928% 929 935* 936 965+ 





1e9# 1130% 321% 1132% 1139% 1140 1480 816518 
749 8Se 868 920 948 8=6:1015 








1689 


1614* 1615 16378 







1107 
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TABLE -- USER SYMBOLS 








16098 
B04 %9 #8 15578 
698 708 740 749 eSe 8t8 926 546 


i? 
is 1078 Ss «1107s? 
138 


6 
1 
1 
1 
1 
693 
1373 


Nearer eee eee aaa... aaa 
. 79 42 
be 
~ 
- ao 
1) oe ww ah] 
= - bat 
RAT OR ERASE Loe B R 
: £ 
-— 
aie § 
; 
= 
_ a9 
z 


4198 698 708 740 749 §S2 £68 920 948 1263 1267 1271 
OR g 12898 
TYPE 1 % 
if 13318 
Tl 1295 1334@ 1335 
= 4218 


1 
363 [4a7" sues 
1 ious 


765 768 819% 837% 838 839 Mee 61% 2 ge4# 1342 





16558 
11le4# ites lleb® 11378 1142 1486 16528 


Bees 
zeaede 
: 
g 
g 8 


rere 
g 
§ 


807 
8 Bel 823 
i 857 907 934 §=611008 1108 1114 1118 


SHREDS OSES 





L 000614 6748 
at nn ne 
= eet 743 Sb 828% 829% 830% 631% 832% 833% 834% 835% 836% 938% i$ 940% 
843 eS4x 65S 856% 859 870 941 953 16898 
LERCHK 005140 13434 
006756 16618 
005154 13468 
= poo012 3818 1598. 
LUPCHK 156 13488 
MASK 006752 1659% 
met 002724 996% 1000 1006 
74 305 991% 
NEMS 22 81 15218 
NOP = 3948 
NEWNES ODa4I? ED 
NS2 68i8 694 704 
NO 00411 1019 12048 
| NI 0041 1020 §©=-: 12058 
| Ne 004125 1021 1206s 


wwe eee ee ee ee - ee 


H 
| 
} 
| 


c - 

reas DISK PACK FORMATTER MACYI] E71 722) O4-NOvV-7G 14:24 PACE 42 

DIRED. PII CROSS REFERENCE TASLE -- USES SYMBOL 

N\3 ‘41 id2e le078 

N4 13; 1023 s«412088 

NS 144 1024 12098 

he iS} 1035 1gi0e 

| NF 1 1336 lelis 

| Ng l 152 lies 

ing } 1028 3s «lelae . 

OCTPNT 465 1155 1302 «= 1308 «Ss 407,113 18828 

5 7342 s«15 158 

aL i4e2e = 143] 

OuTBur= 911544 914 $23 16908 

PAR 797 851 813 817 

Po e.Q0000? sols Sot Be be * 652% 674% 6778 678% 6818 722% 

* + 89% * 795 797% 801% 04  81lle 813 

go7# 6718 875% 891% 294%  895* 900s * 905% 907% 
95S*# 9708 $778 S7Be 975% 990% 1007 16# 10188 10618 
1082% 1085s * 1088% 10968 1098 lle2e 1147" 1149% 115% 
1163*° 1178s 1181# 1188" 1266# 266% 12795 * 1293% 1298 

1 93128 «=«131Se 13188 1321s 304% 13278 1333%  1346# 

| 1358% 13608 1s Me 13668 §=1367# 91369 913718 913728 = 13748 

1301" 1382 1405" 1407* 1409* 1413" [515* 1419s 1436% 
1448% 145ia l454e 1457" 1460e 1463% 146% 1472% 1475 

| 14874 «1490e 1493# 14968 14974 [S834 S87" 1597 elo" 16le* 1 

'PIOK1 O0C762 697 7068 

| PuTOcT 905870 1358 1360 1366 1371 441376 1381 i4éle 1454 1460 1466 

| POPPOP= 022626 4e98 

| POPTT 0 1566 S688 

| BO. = inno 258 

; = 

{Pe ‘s erate 78 

‘Pell 001052 8 741 

/ Pele 001076 7328 «= 750 772 

/PeL3 OOle3e 778 0? 767 

| PENI 90164 748 Us 

| P3 s 1 3988 

| PY s 3938 €8E 

| PS = 4008 

| Pb = 4018 

'P7 os ues = 683 720 723 787 289 932 

| Rests 699 71 1331 15728 

| RIN 678 1160 =-:11828 

 RLLUP 12828 1285 

| ROTOG 006754 lo7a® 277% 12808 1284 16608 

| ee 776 74 843# gS9* 9144 941% 16698 

i 1 ‘] & + 

| RPBLI 16818 

| RPBE r 16828 

Epes ieee 

| Bees 1Pes 

| RECA 732% 64S* 660% 909% 936 1385 1388 1670 

RPCS 006 beo4e * 744% 745% 





43 706 728 734% 746 B44e B4s# B49 863% 864% 
865 1S# 916# 917 943 «= H4# HS 009% «= L101 §=61119* = Leb le64 1269 


oe ee ee ee 


Son eee ee ee ere. ae cers: Gree eee | eee ee 


oe en Oo ee 6 ene +2 emer 6. cee eeeewen 
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SRPD. Pil CROSS REFERENCE TABLE “- USER SYMSOLS 






i a a ee 

Reps , 687 be 733% 847% 862% Sos 937% 138 1369 16728 

RPDAI ? # 1* igeae 

RPDS i! sess 1008* 1010 10l2#  !013 1075 1100# 1:05 1109 11i1 1120# 

RPDS] 7b2 1115 16638 

RPER rete the 1853 16548 

Retr 166S8 ; 

63ss =: 

RPIV 16868 

RPIX 6998 709 

RPM] et 16748 

RPNII 1 16758 

me. ee ete 

1 16 16778 

RPMS 7 16788 

RPN31 16798 

peey 16718 
683% #16878 

RPWC 774 6848 7428 64c# eS8# 913% S40# 16588 

RRLUP O0461 1e7S@ 1278 

et. 107 12808 

RO spoon 1oas 7948 

RO = r g76! 7eS# 791% 806 808 810% 822 824 893% 
899% ose 980# 1 983 98s 987% 988 1060% 1064 1066 1067 1 
108i# 1 11Si# 4153 154# 1161 1164 1166 1171# 1176 1180% 1i8S# 1187% 
1ecee 1283# 1l2e3ee 1297% 1299% 13008 1301 1303% 1305% 1332% 1353% i355 1357% 
1359 1363% 1365% 1368% 13708 13738 13758 1378% 13808 1402 1404# 14068 1408 
14108 iene 1414# 1416# 14188 L422 142e7% 14e8% 142e9% 1433% 1435% 1437% 1 
14478 1 1 14S56% 1459# eos idea" 1468% 14718 1474" 14778 14 1483# 
146% 1489% 14See 1495# 1569 iS73# 61 1ses% 1589% 1592 1595 1598% 1601 
160e# 1607# 76108 1618 1619# 1520 lé22 1624" 

Rl =~000001 3848 1308 1 1584 1603% 1¢04%# 1605 1611% 1613 1615# 

Re =~00000e2 8 156 1575* 1580 1582 1604 1614 

R3 = RH ie 176% 

ps =) £ * 689 756% iA 898* 9S3% 
1l23# ie ie. 1565 1577% 

RS =7000005 3888 69S+# 6 710% 736% 800* 8lex 
950% 9S4 9s Ay 97S# 9908 996# 
1310 1313 1316 131 l32e 1325 1328 

% =%.000996 soe 

SAVOS ra) 1 15658 

SCFLG 116 g2 oe 10438 

ee’ thers rast ie i hie toe 

a) 744 * ga? oe 16568 

CMES 833 11948 

SECR 1133# 11358 1144 1492 16538 

SEKE S11 938 10088 

SEMS 1414 ret} 

aay 9328 939 

Cli 9368 949 7 

SFCLe 002504 Sc4e 958 

SFCN]  O0e%62 947 9508 





DOY 


> 
> 
3 
= 
Ya 
— 
a 
“4 
iz 
u 
> 
2 
7 
Fa 


bs 
a 
wo 
2 


27 (732) 


1 


ISK PACK FORMATTER 
CROSS REFERENCE TABL 


PD.PLi 


RP} 








eg Ee oe) ed ed 


Reooee DEGRA SRSRSCUNmASS BE Se SEE ENGR RRe EN ReeNeS 


REPS RAR RNAI RIM RER RS CEES agt OEM ROL RT IERE 


ont ond Hd et om) 


x =~ Hee wn — is Fat yore Shea 
ae A Aa eet eee ae 


0 aS Se 





mn nn rn a ne en ee ee ee 
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Pi CROSS REFERENCE TABLE -- USER SyMBOLs 

URDY1 000620 6758 

WORK a 995% 997 1004# i 14e4# 8 1425# 1426 16428 

WORK 71 7399 803 815 81 1091 1159# 11738 174% 1175% 1176% 1180 16438 

Hoek 714 1386% eH 1390% tag ie 1395 1397 1398% 1400" 1410 1416 16448 

rh 5 Sites 240 ee 

xX = 000000 8 1338 1634 16. 1636 1637 1638 1639 1640 1641 642 1643 1644 
16 ieee 1647 164 1649 1650 1651 1652 1653 1654 1655 1656 1657 
16 165 1660 166 ies 

. = 007046 4498 454 456 4 46 462 464 466 468 470 472 474 476 
478 480 482 484 4 ts Per cig dan 496 500 S02 
PBs S84 pes 286 £90 5 e3n 238 598 600 208 604 $06 

eye p ed 48 ead aoe sss 578 S3e at roe 535 

7 Bec Bee Sis) Sac ii era) 161087 
1106 1110 1lle 1116 1184 1265 1311 1314 1317 1320 1323 1326 323 
1344 13493 1623 





ee eee 


Sus FIR 


ANDI 


we 


=e 


uae 


= 


ee 
ae 
— oe 


gpa 


‘aie 
S< 


par 


: 
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ERENCE TABLE -- MACRO NAMES 


1170 1186 1405 1411 1417 1423 1434 


7 7 80 1 
9 143 1993 1476 14 148 1494 
1485 1491 


bm pe 
bm bee 


nee ene re me eee - 








873 89 aes oso 1080 1150 1291. 1443 


3 








= 
© 
oe 


f 
a 
ie ‘ 
: 
Fa 
sy 
> 
ts 
= 


Z 
S 


REFERENCE | 


PACK FORMAT 
CROSS 


ne me me a nme on ee ee 


1350 
116 
Att 

1141 

1861 


1140 


1345 
112 
1993 
336 
1106 
3 
935 937 952 
1094 


S 35 shi & ge x 
So =03 = && 3 


1274 
228 
1435 
075 
32S 
1090 
1367 
910 
1089 
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